/ MacTech 1 to 12 / MacTech-vol-1-12.toast / Source / MacTech® Magazine / Volume 02 - 1986 / 02.09 Sep 86.sit / 02.09 Sep 86 / sources boyd / OverView.p

< prev

next >

MacOS 8.1

Win98

DOS

browse contents

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 0a 4f 76 65 72 56 69 | 65 77 2e 70 00 00 00 00 |..OverVi|ew.p....|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 4d 50 53 | 20 01 00 00 00 00 00 00 |.TEXTMPS| .......|
|00000050| 00 00 00 00 00 2c 63 00 | 00 01 7e 9b 3e b2 86 9b |.....,c.|..~.>...|
|00000060| 3e b2 86 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |>.......|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 b0 84 00 00 |........|........|
|00000080| 55 4e 49 54 20 4f 76 65 | 72 56 69 65 77 3b 20 0d |UNIT Ove|rView; .|
|00000090| 7b 56 65 72 73 69 6f 6e | 20 31 2e 30 20 53 61 74 |{Version| 1.0 Sat|
|000000a0| 75 72 64 61 79 2c 20 4a | 75 6c 79 20 31 32 2c 20 |urday, J|uly 12, |
|000000b0| 31 39 38 36 20 39 3a 34 | 37 3a 35 33 20 50 4d 0d |1986 9:4|7:53 PM.|
|000000c0| 20 62 79 20 53 63 6f 74 | 74 20 54 2e 20 42 6f 79 | by Scot|t T. Boy|
|000000d0| 64 2c 20 74 68 65 20 4d | 61 63 48 61 78 aa 20 47 |d, the M|acHax. G|
|000000e0| 72 6f 75 70 0d 20 4d 61 | 6e 79 20 74 68 61 6e 6b |roup. Ma|ny thank|
|000000f0| 73 20 74 6f 20 47 72 65 | 67 20 4d 61 72 72 69 6f |s to Gre|g Marrio|
|00000100| 74 74 20 6f 66 20 53 6f | 66 74 57 61 72 65 20 54 |tt of So|ftWare T|
|00000110| 6f 20 47 6f 2c 0d 20 61 | 6c 73 6f 20 61 20 6d 65 |o Go,. a|lso a me|
|00000120| 6d 62 65 72 20 6f 66 20 | 74 68 65 20 4d 61 63 48 |mber of |the MacH|
|00000130| 61 78 aa 20 47 72 6f 75 | 70 7d 0d 0d 7b 2d 2d 2d |ax. Grou|p}..{---|
|00000140| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000150| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000160| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000170| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000180| 2d 2d 2d 2d 2d 2d 2d 7d | 0d 49 4e 54 45 52 46 41 |-------}|.INTERFA|
|00000190| 43 45 0d 0d 7b 43 6f 6d | 70 69 6c 65 72 20 53 77 |CE..{Com|piler Sw|
|000001a0| 69 74 63 68 20 53 65 74 | 74 69 6e 67 73 7d 0d 7b |itch Set|tings}.{|
|000001b0| 24 52 2b 7d 0d 7b 24 4f | 56 2b 7d 0d 0d 75 73 65 |$R+}.{$O|V+}..use|
|000001c0| 73 20 4d 65 6d 54 79 70 | 65 73 2c 20 51 75 69 63 |s MemTyp|es, Quic|
|000001d0| 6b 44 72 61 77 2c 20 4f | 53 49 6e 74 66 2c 20 54 |kDraw, O|SIntf, T|
|000001e0| 6f 6f 6c 49 6e 74 66 2c | 20 53 41 4e 45 3b 0d 0d |oolIntf,| SANE;..|
|000001f0| 63 6f 6e 73 74 0d 09 4d | 65 6e 75 42 61 72 48 65 |const..M|enuBarHe|
|00000200| 69 67 68 74 09 3d 20 20 | 32 30 3b 09 7b 48 65 69 |ight.=  |20;.{Hei|
|00000210| 67 68 74 20 6f 66 20 6d | 65 6e 75 20 62 61 72 20 |ght of m|enu bar |
|00000220| 69 6e 20 70 69 78 65 6c | 73 7d 0d 09 54 69 74 6c |in pixel|s}..Titl|
|00000230| 65 42 61 72 48 65 69 67 | 68 74 09 3d 20 20 31 38 |eBarHeig|ht.=  18|
|00000240| 3b 09 7b 48 65 69 67 68 | 74 20 6f 66 20 77 69 6e |;.{Heigh|t of win|
|00000250| 64 6f 77 20 74 69 74 6c | 65 20 62 61 72 20 69 6e |dow titl|e bar in|
|00000260| 20 70 69 78 65 6c 73 7d | 0d 09 53 63 72 65 65 6e | pixels}|..Screen|
|00000270| 4d 61 72 67 69 6e 09 3d | 20 20 20 34 3b 09 7b 57 |Margin.=|   4;.{W|
|00000280| 69 64 74 68 20 6f 66 20 | 22 73 61 66 65 74 79 20 |idth of |"safety |
|00000290| 6d 61 72 67 69 6e 22 20 | 61 72 6f 75 6e 64 20 65 |margin" |around e|
|000002a0| 64 67 65 20 6f 66 20 73 | 63 72 65 65 6e 7d 0d 09 |dge of s|creen}..|
|000002b0| 53 42 61 72 48 65 69 67 | 68 74 09 09 3d 20 20 31 |SBarHeig|ht..=  1|
|000002c0| 35 3b 09 7b 48 65 69 67 | 68 74 20 6f 66 20 73 63 |5;.{Heig|ht of sc|
|000002d0| 72 6f 6c 6c 20 62 61 72 | 7d 0d 09 53 42 61 72 57 |roll bar|}..SBarW|
|000002e0| 69 64 74 68 09 09 3d 20 | 20 31 35 3b 09 7b 57 69 |idth..= | 15;.{Wi|
|000002f0| 64 74 68 20 6f 66 20 73 | 63 72 6f 6c 6c 20 62 61 |dth of s|croll ba|
|00000300| 72 7d 0d 0d 50 72 6f 63 | 65 64 75 72 65 20 4e 65 |r}..Proc|edure Ne|
|00000310| 77 4f 76 65 72 56 69 65 | 77 28 20 76 61 72 20 4f |wOverVie|w( var O|
|00000320| 56 5f 70 61 67 65 50 69 | 63 74 20 3a 20 62 69 74 |V_pagePi|ct : bit|
|00000330| 4d 61 70 3b 20 0d 09 09 | 09 09 09 20 20 20 76 61 |Map; ...|...   va|
|00000340| 72 20 4f 56 20 3a 20 57 | 69 6e 64 6f 77 50 74 72 |r OV : W|indowPtr|
|00000350| 3b 20 0d 09 09 09 09 09 | 20 20 20 76 69 65 77 52 |; ......|   viewR|
|00000360| 65 63 74 20 3a 20 52 65 | 63 74 3b 0d 09 09 09 09 |ect : Re|ct;.....|
|00000370| 09 20 20 20 66 61 63 74 | 6f 72 20 3a 20 52 65 61 |.   fact|or : Rea|
|00000380| 6c 20 29 3b 0d 50 72 6f | 63 65 64 75 72 65 20 55 |l );.Pro|cedure U|
|00000390| 70 64 61 74 65 4f 76 65 | 72 56 69 65 77 28 20 50 |pdateOve|rView( P|
|000003a0| 72 6f 63 65 64 75 72 65 | 20 64 72 61 77 50 72 6f |rocedure| drawPro|
|000003b0| 63 3b 0d 09 09 09 09 09 | 09 20 20 4f 56 5f 70 61 |c;......|.  OV_pa|
|000003c0| 67 65 50 69 63 74 20 3a | 20 62 69 74 4d 61 70 29 |gePict :| bitMap)|
|000003d0| 3b 0d 50 72 6f 63 65 64 | 75 72 65 20 4f 76 65 72 |;.Proced|ure Over|
|000003e0| 56 69 65 77 53 65 6c 65 | 63 74 28 20 77 68 65 72 |ViewSele|ct( wher|
|000003f0| 65 3a 20 50 6f 69 6e 74 | 3b 20 0d 09 09 09 09 09 |e: Point|; ......|
|00000400| 09 20 20 76 69 65 77 52 | 65 63 74 20 3a 20 52 65 |.  viewR|ect : Re|
|00000410| 63 74 3b 20 56 41 52 20 | 73 63 72 6f 6c 6c 50 6f |ct; VAR |scrollPo|
|00000420| 73 69 74 69 6f 6e 20 3a | 20 50 6f 69 6e 74 3b 20 |sition :| Point; |
|00000430| 0d 09 09 09 09 09 09 20 | 20 56 41 52 20 4f 56 20 |....... | VAR OV |
|00000440| 3a 20 57 69 6e 64 6f 77 | 50 74 72 3b 20 56 41 52 |: Window|Ptr; VAR|
|00000450| 20 4f 56 5f 70 61 67 65 | 50 69 63 74 20 3a 20 62 | OV_page|Pict : b|
|00000460| 69 74 4d 61 70 3b 20 0d | 09 09 09 09 09 09 20 20 |itMap; .|......  |
|00000470| 48 53 63 72 6f 6c 6c 42 | 61 72 2c 56 53 63 72 6f |HScrollB|ar,VScro|
|00000480| 6c 6c 42 61 72 20 3a 20 | 43 6f 6e 74 72 6f 6c 48 |llBar : |ControlH|
|00000490| 61 6e 64 6c 65 29 3b 0d | 0d 7b 2d 2d 2d 2d 2d 2d |andle);.|.{------|
|000004a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000004b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000004c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000004d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000004e0| 2d 2d 2d 2d 7d 0d 49 4d | 50 4c 45 4d 45 4e 54 41 |----}.IM|PLEMENTA|
|000004f0| 54 49 4f 4e 0d 50 72 6f | 63 65 64 75 72 65 20 4e |TION.Pro|cedure N|
|00000500| 65 77 4f 76 65 72 56 69 | 65 77 20 7b 28 20 76 61 |ewOverVi|ew {( va|
|00000510| 72 20 4f 56 5f 70 61 67 | 65 50 69 63 74 20 3a 20 |r OV_pag|ePict : |
|00000520| 62 69 74 4d 61 70 3b 20 | 0d 09 09 09 09 09 20 20 |bitMap; |......  |
|00000530| 20 76 61 72 20 4f 56 20 | 3a 20 57 69 6e 64 6f 77 | var OV |: Window|
|00000540| 50 74 72 3b 20 0d 09 09 | 09 09 09 20 20 20 76 69 |Ptr; ...|...   vi|
|00000550| 65 77 52 65 63 74 20 3a | 20 52 65 63 74 3b 0d 09 |ewRect :| Rect;..|
|00000560| 09 09 09 09 20 20 20 66 | 61 63 74 6f 72 20 3a 20 |....   f|actor : |
|00000570| 52 65 61 6c 20 29 7d 3b | 0d 76 61 72 0d 09 64 75 |Real )};|.var..du|
|00000580| 6d 6d 79 52 65 63 74 09 | 3a 09 52 65 63 74 3b 0d |mmyRect.|:.Rect;.|
|00000590| 09 68 6f 72 69 7a 6f 6e | 74 61 6c 2c 09 09 09 09 |.horizon|tal,....|
|000005a0| 09 09 7b 68 6f 72 69 7a | 2e 20 70 69 78 65 6c 20 |..{horiz|. pixel |
|000005b0| 73 69 7a 65 20 6f 66 20 | 74 68 65 20 4f 76 65 72 |size of |the Over|
|000005c0| 56 69 65 77 20 77 69 6e | 64 6f 77 7d 0d 09 76 65 |View win|dow}..ve|
|000005d0| 72 74 69 63 61 6c 09 3a | 09 45 78 74 65 6e 64 65 |rtical.:|.Extende|
|000005e0| 64 3b 09 09 7b 76 65 72 | 74 2e 20 70 69 78 65 6c |d;..{ver|t. pixel|
|000005f0| 20 73 69 7a 65 20 6f 66 | 20 74 68 65 20 4f 76 65 | size of| the Ove|
|00000600| 72 56 69 65 77 20 77 69 | 6e 64 6f 77 7d 0d 09 73 |rView wi|ndow}..s|
|00000610| 69 7a 65 4f 66 4f 66 66 | 09 3a 09 53 69 7a 65 3b |izeOfOff|.:.Size;|
|00000620| 09 09 09 7b 62 79 74 65 | 73 20 6e 65 65 64 65 64 |...{byte|s needed|
|00000630| 20 66 6f 72 20 6f 66 66 | 73 63 72 65 65 6e 20 62 | for off|screen b|
|00000640| 69 74 6d 61 70 7d 0d 09 | 6f 66 66 52 6f 77 42 79 |itmap}..|offRowBy|
|00000650| 74 65 73 09 3a 09 49 6e | 74 65 67 65 72 3b 09 09 |tes.:.In|teger;..|
|00000660| 7b 72 6f 77 20 62 79 74 | 65 73 20 6e 65 65 64 65 |{row byt|es neede|
|00000670| 64 20 66 6f 72 20 6f 66 | 66 73 63 72 65 65 6e 20 |d for of|fscreen |
|00000680| 62 69 74 6d 61 70 7d 0d | 09 62 69 74 52 65 63 74 |bitmap}.|.bitRect|
|00000690| 09 09 3a 09 52 65 63 74 | 3b 09 09 09 7b 73 69 7a |..:.Rect|;...{siz|
|000006a0| 65 20 6f 66 20 4f 56 20 | 77 69 6e 64 6f 77 20 61 |e of OV |window a|
|000006b0| 6e 64 20 6f 66 66 73 63 | 72 65 65 6e 20 62 69 74 |nd offsc|reen bit|
|000006c0| 6d 61 70 7d 0d 09 64 75 | 6d 6d 79 09 09 3a 09 50 |map}..du|mmy..:.P|
|000006d0| 6f 69 6e 74 3b 0d 09 6f | 66 66 50 6f 72 74 2c 09 |oint;..o|ffPort,.|
|000006e0| 09 09 09 09 09 7b 74 65 | 6d 70 6f 72 61 72 79 20 |.....{te|mporary |
|000006f0| 77 6f 72 6b 69 6e 67 20 | 70 6f 72 74 7d 0d 09 6f |working |port}..o|
|00000700| 6c 64 50 6f 72 74 09 09 | 3a 09 47 72 61 66 50 74 |ldPort..|:.GrafPt|
|00000710| 72 3b 09 09 7b 74 65 6d | 70 6f 72 61 72 79 20 73 |r;..{tem|porary s|
|00000720| 74 6f 72 61 67 65 7d 0d | 62 65 67 69 6e 0d 09 7b |torage}.|begin..{|
|00000730| 63 6f 6d 70 75 74 65 20 | 61 76 61 69 6c 61 62 6c |compute |availabl|
|00000740| 65 20 76 65 72 74 69 63 | 61 6c 20 73 63 72 65 65 |e vertic|al scree|
|00000750| 6e 20 73 70 61 63 65 7d | 0d 09 76 65 72 74 69 63 |n space}|..vertic|
|00000760| 61 6c 20 3a 3d 20 53 63 | 72 65 65 6e 42 69 74 73 |al := Sc|reenBits|
|00000770| 2e 62 6f 75 6e 64 73 2e | 62 6f 74 74 6f 6d 2d 53 |.bounds.|bottom-S|
|00000780| 63 72 65 65 6e 42 69 74 | 73 2e 62 6f 75 6e 64 73 |creenBit|s.bounds|
|00000790| 2e 74 6f 70 2d 4d 65 6e | 75 42 61 72 48 65 69 67 |.top-Men|uBarHeig|
|000007a0| 68 74 3b 0d 09 76 65 72 | 74 69 63 61 6c 20 3a 3d |ht;..ver|tical :=|
|000007b0| 20 76 65 72 74 69 63 61 | 6c 20 2a 20 66 61 63 74 | vertica|l * fact|
|000007c0| 6f 72 3b 0d 0d 09 7b 63 | 6f 6d 70 75 74 65 20 68 |or;...{c|ompute h|
|000007d0| 6f 72 69 7a 6f 6e 74 61 | 6c 20 74 6f 20 70 72 6f |orizonta|l to pro|
|000007e0| 70 6f 72 74 69 6f 6e 7d | 0d 09 68 6f 72 69 7a 6f |portion}|..horizo|
|000007f0| 6e 74 61 6c 20 3a 3d 20 | 76 65 72 74 69 63 61 6c |ntal := |vertical|
|00000800| 20 2a 20 76 69 65 77 52 | 65 63 74 2e 72 69 67 68 | * viewR|ect.righ|
|00000810| 74 20 2f 20 76 69 65 77 | 52 65 63 74 2e 62 6f 74 |t / view|Rect.bot|
|00000820| 74 6f 6d 3b 0d 0d 09 7b | 63 72 65 61 74 65 20 74 |tom;...{|create t|
|00000830| 68 65 20 6e 65 77 20 77 | 69 6e 64 6f 77 20 72 65 |he new w|indow re|
|00000840| 63 6f 72 64 7d 0d 09 53 | 65 74 52 65 63 74 28 64 |cord}..S|etRect(d|
|00000850| 75 6d 6d 79 52 65 63 74 | 2c 30 2c 30 2c 4e 75 6d |ummyRect|,0,0,Num|
|00000860| 32 49 6e 74 65 67 65 72 | 28 68 6f 72 69 7a 6f 6e |2Integer|(horizon|
|00000870| 74 61 6c 29 2c 4e 75 6d | 32 49 6e 74 65 67 65 72 |tal),Num|2Integer|
|00000880| 28 76 65 72 74 69 63 61 | 6c 29 29 3b 0d 09 4f 56 |(vertica|l));..OV|
|00000890| 20 3a 3d 20 4e 65 77 57 | 69 6e 64 6f 77 28 20 6e | := NewW|indow( n|
|000008a0| 69 6c 2c 64 75 6d 6d 79 | 52 65 63 74 2c 27 27 2c |il,dummy|Rect,'',|
|000008b0| 46 41 4c 53 45 2c 61 6c | 74 44 42 6f 78 50 72 6f |FALSE,al|tDBoxPro|
|000008c0| 63 2c 57 69 6e 64 6f 77 | 50 74 72 28 2d 31 29 2c |c,Window|Ptr(-1),|
|000008d0| 0d 09 09 09 09 09 46 41 | 4c 53 45 2c 4c 6f 6e 67 |......FA|LSE,Long|
|000008e0| 49 6e 74 28 30 29 20 29 | 3b 0d 0d 09 7b 63 72 65 |Int(0) )|;...{cre|
|000008f0| 61 74 65 20 6f 66 66 73 | 63 72 65 65 6e 20 62 69 |ate offs|creen bi|
|00000900| 74 6d 61 70 7d 0d 09 62 | 69 74 52 65 63 74 20 3a |tmap}..b|itRect :|
|00000910| 3d 20 4f 56 5e 2e 70 6f | 72 74 52 65 63 74 3b 0d |= OV^.po|rtRect;.|
|00000920| 09 6f 66 66 52 6f 77 42 | 79 74 65 73 20 3a 3d 20 |.offRowB|ytes := |
|00000930| 28 28 62 69 74 52 65 63 | 74 2e 72 69 67 68 74 2d |((bitRec|t.right-|
|00000940| 62 69 74 52 65 63 74 2e | 6c 65 66 74 29 20 64 69 |bitRect.|left) di|
|00000950| 76 20 38 29 20 2b 20 31 | 3b 0d 09 69 66 20 4f 64 |v 8) + 1|;..if Od|
|00000960| 64 28 20 6f 66 66 52 6f | 77 42 79 74 65 73 20 29 |d( offRo|wBytes )|
|00000970| 20 74 68 65 6e 20 6f 66 | 66 52 6f 77 42 79 74 65 | then of|fRowByte|
|00000980| 73 20 3a 3d 20 6f 66 66 | 52 6f 77 42 79 74 65 73 |s := off|RowBytes|
|00000990| 20 2d 20 31 3b 0d 09 73 | 69 7a 65 4f 66 4f 66 66 | - 1;..s|izeOfOff|
|000009a0| 20 3a 3d 20 28 62 69 74 | 52 65 63 74 2e 62 6f 74 | := (bit|Rect.bot|
|000009b0| 74 6f 6d 2d 62 69 74 52 | 65 63 74 2e 74 6f 70 29 |tom-bitR|ect.top)|
|000009c0| 20 2a 20 6f 66 66 52 6f | 77 42 79 74 65 73 3b 0d | * offRo|wBytes;.|
|000009d0| 09 77 69 74 68 20 4f 56 | 5f 70 61 67 65 50 69 63 |.with OV|_pagePic|
|000009e0| 74 20 64 6f 0d 09 09 62 | 65 67 69 6e 0d 09 09 09 |t do...b|egin....|
|000009f0| 62 61 73 65 41 64 64 72 | 20 3a 3d 20 51 44 50 74 |baseAddr| := QDPt|
|00000a00| 72 28 20 4e 65 77 50 74 | 72 28 20 73 69 7a 65 4f |r( NewPt|r( sizeO|
|00000a10| 66 4f 66 66 20 29 29 3b | 0d 09 09 09 72 6f 77 42 |fOff ));|....rowB|
|00000a20| 79 74 65 73 20 3a 3d 20 | 6f 66 66 52 6f 77 42 79 |ytes := |offRowBy|
|00000a30| 74 65 73 3b 0d 09 09 09 | 62 6f 75 6e 64 73 20 20 |tes;....|bounds  |
|00000a40| 20 3a 3d 20 62 69 74 52 | 65 63 74 3b 0d 09 09 65 | := bitR|ect;...e|
|00000a50| 6e 64 3b 0d 09 0d 09 7b | 66 69 6c 6c 20 74 68 65 |nd;....{|fill the|
|00000a60| 20 62 69 74 6d 61 70 20 | 77 69 74 68 20 77 68 69 | bitmap |with whi|
|00000a70| 74 65 7d 0d 09 47 65 74 | 50 6f 72 74 28 20 6f 6c |te}..Get|Port( ol|
|00000a80| 64 50 6f 72 74 20 29 3b | 09 09 09 09 0d 09 6f 66 |dPort );|......of|
|00000a90| 66 50 6f 72 74 20 3a 3d | 20 47 72 61 66 50 74 72 |fPort :=| GrafPtr|
|00000aa0| 28 20 4e 65 77 50 74 72 | 28 20 73 69 7a 65 6f 66 |( NewPtr|( sizeof|
|00000ab0| 28 20 47 72 61 66 50 6f | 72 74 20 29 29 29 3b 0d |( GrafPo|rt )));.|
|00000ac0| 09 4f 70 65 6e 50 6f 72 | 74 28 20 6f 66 66 50 6f |.OpenPor|t( offPo|
|00000ad0| 72 74 20 29 3b 0d 09 53 | 65 74 50 6f 72 74 42 69 |rt );..S|etPortBi|
|00000ae0| 74 73 28 20 4f 56 5f 70 | 61 67 65 50 69 63 74 20 |ts( OV_p|agePict |
|00000af0| 29 3b 0d 09 46 69 6c 6c | 52 65 63 74 28 20 62 69 |);..Fill|Rect( bi|
|00000b00| 74 52 65 63 74 2c 20 77 | 68 69 74 65 20 29 3b 0d |tRect, w|hite );.|
|00000b10| 09 53 65 74 50 6f 72 74 | 28 20 6f 6c 64 50 6f 72 |.SetPort|( oldPor|
|00000b20| 74 20 29 3b 0d 09 43 6c | 6f 73 65 50 6f 72 74 28 |t );..Cl|osePort(|
|00000b30| 20 6f 66 66 50 6f 72 74 | 20 29 3b 0d 09 44 69 73 | offPort| );..Dis|
|00000b40| 70 6f 73 50 74 72 28 20 | 50 74 72 28 20 6f 66 66 |posPtr( |Ptr( off|
|00000b50| 50 6f 72 74 20 29 29 3b | 0d 65 6e 64 3b 20 7b 4d |Port ));|.end; {M|
|00000b60| 61 6b 65 4f 76 65 72 56 | 69 65 77 7d 0d 0d 7b 2d |akeOverV|iew}..{-|
|00000b70| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000b80| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000b90| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000ba0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000bb0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 7d 0d 50 72 6f 63 65 |--------|-}.Proce|
|00000bc0| 64 75 72 65 20 55 70 64 | 61 74 65 4f 76 65 72 56 |dure Upd|ateOverV|
|00000bd0| 69 65 77 20 7b 28 20 64 | 72 61 77 50 72 6f 63 20 |iew {( d|rawProc |
|00000be0| 3a 20 50 72 6f 63 65 64 | 75 72 65 3b 0d 09 09 09 |: Proced|ure;....|
|00000bf0| 09 09 09 20 20 4f 56 5f | 70 61 67 65 50 69 63 74 |...  OV_|pagePict|
|00000c00| 20 3a 20 62 69 74 4d 61 | 70 29 7d 3b 0d 76 61 72 | : bitMa|p)};.var|
|00000c10| 0d 09 6f 66 66 50 6f 72 | 74 2c 0d 09 6f 6c 64 50 |..offPor|t,..oldP|
|00000c20| 6f 72 74 09 09 3a 09 47 | 72 61 66 50 74 72 3b 0d |ort..:.G|rafPtr;.|
|00000c30| 62 65 67 69 6e 0d 09 47 | 65 74 50 6f 72 74 28 20 |begin..G|etPort( |
|00000c40| 6f 6c 64 50 6f 72 74 20 | 29 3b 0d 09 6f 66 66 50 |oldPort |);..offP|
|00000c50| 6f 72 74 20 3a 3d 20 47 | 72 61 66 50 74 72 28 20 |ort := G|rafPtr( |
|00000c60| 4e 65 77 50 74 72 28 20 | 73 69 7a 65 6f 66 28 20 |NewPtr( |sizeof( |
|00000c70| 47 72 61 66 50 6f 72 74 | 20 29 29 29 3b 0d 09 4f |GrafPort| )));..O|
|00000c80| 70 65 6e 50 6f 72 74 28 | 20 6f 66 66 50 6f 72 74 |penPort(| offPort|
|00000c90| 20 29 3b 0d 09 53 65 74 | 50 6f 72 74 42 69 74 73 | );..Set|PortBits|
|00000ca0| 28 20 4f 56 5f 70 61 67 | 65 50 69 63 74 20 29 3b |( OV_pag|ePict );|
|00000cb0| 09 09 7b 6d 61 6b 65 20 | 61 6c 6c 20 64 72 61 77 |..{make |all draw|
|00000cc0| 69 6e 67 20 68 61 70 70 | 65 6e 20 6f 66 66 73 63 |ing happ|en offsc|
|00000cd0| 72 65 65 6e 7d 0d 0d 09 | 64 72 61 77 50 72 6f 63 |reen}...|drawProc|
|00000ce0| 3b 09 09 09 09 09 09 7b | 6c 65 74 20 74 68 65 20 |;......{|let the |
|00000cf0| 75 73 65 72 20 64 72 61 | 77 7d 0d 0d 09 53 65 74 |user dra|w}...Set|
|00000d00| 50 6f 72 74 28 20 6f 6c | 64 50 6f 72 74 20 29 3b |Port( ol|dPort );|
|00000d10| 09 09 09 09 7b 72 65 74 | 75 72 6e 20 64 72 61 77 |....{ret|urn draw|
|00000d20| 69 6e 67 20 74 6f 20 6e | 6f 72 6d 61 6c 7d 0d 09 |ing to n|ormal}..|
|00000d30| 43 6c 6f 73 65 50 6f 72 | 74 28 20 6f 66 66 50 6f |ClosePor|t( offPo|
|00000d40| 72 74 20 29 3b 0d 09 44 | 69 73 70 6f 73 50 74 72 |rt );..D|isposPtr|
|00000d50| 28 20 50 74 72 28 20 6f | 66 66 50 6f 72 74 20 29 |( Ptr( o|ffPort )|
|00000d60| 29 3b 0d 65 6e 64 3b 20 | 7b 55 70 64 61 74 65 4f |);.end; |{UpdateO|
|00000d70| 76 65 72 56 69 65 77 7d | 0d 0d 7b 2d 2d 2d 2d 2d |verView}|..{-----|
|00000d80| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000d90| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000da0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000db0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000dc0| 2d 2d 2d 2d 2d 7d 0d 50 | 72 6f 63 65 64 75 72 65 |-----}.P|rocedure|
|00000dd0| 20 4f 76 65 72 56 69 65 | 77 53 65 6c 65 63 74 7b | OverVie|wSelect{|
|00000de0| 28 20 77 68 65 72 65 3a | 20 50 6f 69 6e 74 3b 20 |( where:| Point; |
|00000df0| 0d 09 09 09 09 09 76 69 | 65 77 52 65 63 74 20 3a |......vi|ewRect :|
|00000e00| 20 52 65 63 74 3b 20 56 | 41 52 20 73 63 72 6f 6c | Rect; V|AR scrol|
|00000e10| 6c 50 6f 73 69 74 69 6f | 6e 20 3a 20 50 6f 69 6e |lPositio|n : Poin|
|00000e20| 74 3b 20 0d 09 09 09 09 | 09 56 41 52 20 4f 56 20 |t; .....|.VAR OV |
|00000e30| 3a 20 57 69 6e 64 6f 77 | 50 74 72 3b 20 56 41 52 |: Window|Ptr; VAR|
|00000e40| 20 4f 56 5f 70 61 67 65 | 50 69 63 74 20 3a 20 62 | OV_page|Pict : b|
|00000e50| 69 74 4d 61 70 3b 20 0d | 09 09 09 09 09 48 53 63 |itMap; .|.....HSc|
|00000e60| 72 6f 6c 6c 42 61 72 2c | 56 53 63 72 6f 6c 6c 42 |rollBar,|VScrollB|
|00000e70| 61 72 20 3a 20 43 6f 6e | 74 72 6f 6c 48 61 6e 64 |ar : Con|trolHand|
|00000e80| 6c 65 29 7d 3b 0d 76 61 | 72 0d 09 4d 65 6e 75 46 |le)};.va|r..MenuF|
|00000e90| 6c 61 73 68 09 09 3a 20 | 5e 49 6e 74 65 67 65 72 |lash..: |^Integer|
|00000ea0| 3b 09 09 7b 73 79 73 74 | 65 6d 20 67 6c 6f 62 61 |;..{syst|em globa|
|00000eb0| 6c 7d 0d 0d 09 76 61 6c | 75 65 2c 09 09 09 09 09 |l}...val|ue,.....|
|00000ec0| 09 09 7b 76 61 6c 75 65 | 20 72 65 74 75 72 6e 65 |..{value| returne|
|00000ed0| 64 20 62 79 20 54 72 61 | 63 6b 47 72 61 79 52 67 |d by Tra|ckGrayRg|
|00000ee0| 6e 7d 0d 09 68 2c 20 76 | 09 09 09 3a 20 4c 6f 6e |n}..h, v|...: Lon|
|00000ef0| 67 49 6e 74 3b 09 09 7b | 7d 0d 0d 09 70 61 6e 65 |gInt;..{|}...pane|
|00000f00| 2c 09 09 09 09 09 09 09 | 7b 7d 0d 09 74 65 6d 70 |,.......|{}..temp|
|00000f10| 50 74 09 09 09 3a 20 50 | 6f 69 6e 74 3b 09 09 7b |Pt...: P|oint;..{|
|00000f20| 7d 0d 0d 09 73 63 6f 70 | 65 2c 09 09 09 09 09 09 |}...scop|e,......|
|00000f30| 09 7b 73 69 7a 65 20 6f | 66 20 77 69 6e 64 6f 77 |.{size o|f window|
|00000f40| 20 70 61 6e 65 20 73 63 | 61 6c 65 64 20 69 6e 74 | pane sc|aled int|
|00000f50| 6f 20 4f 56 20 77 69 6e | 64 6f 77 7d 0d 09 74 65 |o OV win|dow}..te|
|00000f60| 6d 70 52 65 63 74 2c 0d | 09 6c 69 6d 69 74 52 65 |mpRect,.|.limitRe|
|00000f70| 63 74 2c 09 09 09 09 09 | 09 7b 6c 69 6d 69 74 20 |ct,.....|.{limit |
|00000f80| 66 6f 72 20 64 72 61 67 | 20 72 65 67 69 6f 6e 7d |for drag| region}|
|00000f90| 0d 09 73 6c 6f 70 52 65 | 63 74 09 09 3a 20 52 65 |..slopRe|ct..: Re|
|00000fa0| 63 74 3b 09 09 09 7b 73 | 6c 6f 70 69 6e 65 73 73 |ct;...{s|lopiness|
|00000fb0| 20 61 6c 6c 6f 77 61 6e | 63 65 20 66 6f 72 20 64 | allowan|ce for d|
|00000fc0| 72 61 67 67 69 6e 67 7d | 0d 0d 09 64 72 61 67 52 |ragging}|...dragR|
|00000fd0| 65 63 74 52 67 6e 09 09 | 3a 20 52 67 6e 48 61 6e |ectRgn..|: RgnHan|
|00000fe0| 64 6c 65 3b 09 7b 74 68 | 65 20 72 65 67 69 6f 6e |dle;.{th|e region|
|00000ff0| 20 74 68 65 20 75 73 65 | 72 20 64 72 61 67 73 20 | the use|r drags |
|00001000| 61 72 6f 75 6e 64 7d 0d | 09 6f 6c 64 50 6f 72 74 |around}.|.oldPort|
|00001010| 09 09 09 3a 20 47 72 61 | 66 50 74 72 3b 0d 09 74 |...: Gra|fPtr;..t|
|00001020| 68 65 57 69 6e 64 6f 77 | 09 09 3a 20 57 69 6e 64 |heWindow|..: Wind|
|00001030| 6f 77 50 74 72 3b 09 7b | 68 6f 6c 64 73 20 74 68 |owPtr;.{|holds th|
|00001040| 65 20 76 61 6c 75 65 20 | 6f 66 20 66 72 6f 6e 74 |e value |of front|
|00001050| 57 69 6e 64 6f 77 7d 0d | 09 75 6e 64 65 72 53 63 |Window}.|.underSc|
|00001060| 6f 70 65 09 09 3a 20 42 | 69 74 4d 61 70 3b 09 09 |ope..: B|itMap;..|
|00001070| 7b 64 79 6e 61 6d 69 63 | 61 6c 6c 79 20 61 6c 6c |{dynamic|ally all|
|00001080| 6f 63 61 74 65 64 20 6f | 66 66 73 63 72 65 65 6e |ocated o|ffscreen|
|00001090| 20 62 69 74 6d 61 70 7d | 0d 09 77 68 69 63 68 57 | bitmap}|..whichW|
|000010a0| 69 6e 64 6f 77 20 09 3a | 20 57 69 6e 64 6f 77 50 |indow .:| WindowP|
|000010b0| 74 72 3b 09 7b 66 6f 72 | 20 73 61 76 65 20 61 6e |tr;.{for| save an|
|000010c0| 64 20 72 65 73 74 6f 72 | 65 20 62 69 74 73 7d 0d |d restor|e bits}.|
|000010d0| 09 7b 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.{------|--------|
|000010e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000010f0| 2d 2d 2d 2d 7d 0d 09 50 | 72 6f 63 65 64 75 72 65 |----}..P|rocedure|
|00001100| 20 4f 56 5f 50 72 65 70 | 61 72 65 3b 0d 09 62 65 | OV_Prep|are;..be|
|00001110| 67 69 6e 0d 09 09 4d 65 | 6e 75 46 6c 61 73 68 20 |gin...Me|nuFlash |
|00001120| 3a 3d 20 70 6f 69 6e 74 | 65 72 28 24 41 32 34 29 |:= point|er($A24)|
|00001130| 3b 0d 0d 09 09 47 65 74 | 50 6f 72 74 28 20 6f 6c |;....Get|Port( ol|
|00001140| 64 50 6f 72 74 20 29 3b | 0d 09 09 74 68 65 57 69 |dPort );|...theWi|
|00001150| 6e 64 6f 77 20 3a 3d 20 | 46 72 6f 6e 74 57 69 6e |ndow := |FrontWin|
|00001160| 64 6f 77 3b 09 7b 74 68 | 65 57 69 6e 64 6f 77 20 |dow;.{th|eWindow |
|00001170| 72 65 66 65 72 73 20 74 | 6f 20 74 68 65 20 61 63 |refers t|o the ac|
|00001180| 74 69 76 65 20 77 69 6e | 64 6f 77 20 6f 6e 20 65 |tive win|dow on e|
|00001190| 6e 74 72 79 7d 0d 09 09 | 42 72 69 6e 67 54 6f 46 |ntry}...|BringToF|
|000011a0| 72 6f 6e 74 28 20 4f 56 | 20 29 3b 09 09 09 7b 6d |ront( OV| );...{m|
|000011b0| 61 6b 65 20 4f 56 20 61 | 70 70 65 61 72 2c 20 62 |ake OV a|ppear, b|
|000011c0| 75 74 20 6e 6f 74 20 72 | 65 61 6c 6c 79 7d 0d 09 |ut not r|eally}..|
|000011d0| 09 53 65 74 50 6f 72 74 | 28 20 4f 56 20 29 3b 09 |.SetPort|( OV );.|
|000011e0| 09 09 09 7b 69 74 27 73 | 20 6e 6f 77 20 74 68 65 |...{it's| now the|
|000011f0| 20 63 75 72 72 65 6e 74 | 20 70 6f 72 74 7d 0d 09 | current| port}..|
|00001200| 09 53 68 6f 77 48 69 64 | 65 28 20 4f 56 2c 20 46 |.ShowHid|e( OV, F|
|00001210| 41 4c 53 45 20 29 3b 09 | 09 7b 69 74 27 73 20 61 |ALSE );.|.{it's a|
|00001220| 6c 73 6f 20 6e 6f 74 20 | 76 69 73 69 62 6c 65 7d |lso not |visible}|
|00001230| 0d 09 09 4d 6f 76 65 57 | 69 6e 64 6f 77 28 20 4f |...MoveW|indow( O|
|00001240| 56 2c 30 2c 30 2c 46 41 | 4c 53 45 20 29 3b 09 7b |V,0,0,FA|LSE );.{|
|00001250| 68 6f 6d 65 20 74 68 65 | 20 77 69 6e 64 6f 77 7d |home the| window}|
|00001260| 0d 0d 09 09 7b 63 6f 6d | 70 75 74 65 20 74 68 65 |....{com|pute the|
|00001270| 20 73 69 7a 65 20 6f 66 | 20 74 68 65 20 63 75 72 | size of| the cur|
|00001280| 72 65 6e 74 20 77 69 6e | 64 6f 77 20 70 61 6e 65 |rent win|dow pane|
|00001290| 7d 0d 09 09 70 61 6e 65 | 2e 68 20 3a 3d 20 74 68 |}...pane|.h := th|
|000012a0| 65 57 69 6e 64 6f 77 5e | 2e 70 6f 72 74 52 65 63 |eWindow^|.portRec|
|000012b0| 74 2e 72 69 67 68 74 20 | 2d 20 74 68 65 57 69 6e |t.right |- theWin|
|000012c0| 64 6f 77 5e 2e 70 6f 72 | 74 52 65 63 74 2e 6c 65 |dow^.por|tRect.le|
|000012d0| 66 74 20 2d 20 73 42 61 | 72 57 69 64 74 68 3b 0d |ft - sBa|rWidth;.|
|000012e0| 09 09 70 61 6e 65 2e 76 | 20 3a 3d 20 74 68 65 57 |..pane.v| := theW|
|000012f0| 69 6e 64 6f 77 5e 2e 70 | 6f 72 74 52 65 63 74 2e |indow^.p|ortRect.|
|00001300| 62 6f 74 74 6f 6d 20 2d | 20 74 68 65 57 69 6e 64 |bottom -| theWind|
|00001310| 6f 77 5e 2e 70 6f 72 74 | 52 65 63 74 2e 74 6f 70 |ow^.port|Rect.top|
|00001320| 20 2d 20 73 42 61 72 48 | 65 69 67 68 74 3b 0d 0d | - sBarH|eight;..|
|00001330| 09 09 7b 73 63 61 6c 65 | 20 74 68 65 20 70 61 6e |..{scale| the pan|
|00001340| 65 20 69 6e 74 6f 20 74 | 68 65 20 4f 56 20 77 69 |e into t|he OV wi|
|00001350| 6e 64 6f 77 20 74 6f 20 | 73 68 6f 77 20 73 69 7a |ndow to |show siz|
|00001360| 65 20 72 65 6c 61 74 69 | 76 65 20 74 6f 20 64 6f |e relati|ve to do|
|00001370| 63 75 6d 65 6e 74 7d 0d | 09 09 53 65 74 52 65 63 |cument}.|..SetRec|
|00001380| 74 28 20 74 65 6d 70 52 | 65 63 74 2c 20 30 2c 20 |t( tempR|ect, 0, |
|00001390| 30 2c 20 70 61 6e 65 2e | 68 2c 20 70 61 6e 65 2e |0, pane.|h, pane.|
|000013a0| 76 20 29 3b 0d 09 09 4d | 61 70 52 65 63 74 28 20 |v );...M|apRect( |
|000013b0| 74 65 6d 70 52 65 63 74 | 2c 20 76 69 65 77 52 65 |tempRect|, viewRe|
|000013c0| 63 74 2c 20 4f 56 5e 2e | 70 6f 72 74 52 65 63 74 |ct, OV^.|portRect|
|000013d0| 20 29 3b 0d 09 09 73 63 | 6f 70 65 20 3a 3d 20 74 | );...sc|ope := t|
|000013e0| 65 6d 70 52 65 63 74 3b | 0d 0d 09 09 7b 6d 61 6b |empRect;|....{mak|
|000013f0| 65 20 74 68 65 20 72 65 | 67 69 6f 6e 20 74 6f 20 |e the re|gion to |
|00001400| 64 72 61 67 20 61 72 6f | 75 6e 64 2e 20 20 73 61 |drag aro|und.  sa|
|00001410| 6d 65 20 73 69 7a 65 20 | 61 73 20 73 63 6f 70 65 |me size |as scope|
|00001420| 7d 09 09 0d 09 09 64 72 | 61 67 52 65 63 74 52 67 |}.....dr|agRectRg|
|00001430| 6e 20 3a 3d 20 4e 65 77 | 52 67 6e 3b 0d 09 09 52 |n := New|Rgn;...R|
|00001440| 65 63 74 52 67 6e 28 20 | 64 72 61 67 52 65 63 74 |ectRgn( |dragRect|
|00001450| 52 67 6e 2c 73 63 6f 70 | 65 20 29 3b 0d 09 09 0d |Rgn,scop|e );....|
|00001460| 09 09 7b 62 65 6c 69 65 | 76 65 20 69 74 20 6f 72 |..{belie|ve it or|
|00001470| 20 6e 6f 74 2c 20 74 68 | 69 73 20 77 6f 72 6b 73 | not, th|is works|
|00001480| 20 74 6f 20 6c 69 6d 69 | 74 20 74 68 65 20 6d 6f | to limi|t the mo|
|00001490| 76 65 6d 65 6e 74 20 6f | 66 20 64 72 61 67 52 65 |vement o|f dragRe|
|000014a0| 63 74 52 67 6e 7d 0d 09 | 09 53 65 74 52 65 63 74 |ctRgn}..|.SetRect|
|000014b0| 28 20 6c 69 6d 69 74 52 | 65 63 74 2c 20 30 2c 20 |( limitR|ect, 0, |
|000014c0| 30 2c 20 4f 56 5e 2e 70 | 6f 72 74 52 65 63 74 2e |0, OV^.p|ortRect.|
|000014d0| 72 69 67 68 74 2d 73 63 | 6f 70 65 2e 72 69 67 68 |right-sc|ope.righ|
|000014e0| 74 2b 31 2c 0d 09 09 09 | 09 09 09 09 09 20 20 4f |t+1,....|.....  O|
|000014f0| 56 5e 2e 70 6f 72 74 52 | 65 63 74 2e 62 6f 74 74 |V^.portR|ect.bott|
|00001500| 6f 6d 2d 73 63 6f 70 65 | 2e 62 6f 74 74 6f 6d 2b |om-scope|.bottom+|
|00001510| 31 20 29 3b 0d 0d 09 09 | 7b 73 63 61 6c 65 20 73 |1 );....|{scale s|
|00001520| 63 72 6f 6c 6c 50 6f 73 | 69 74 69 6f 6e 20 69 6e |crollPos|ition in|
|00001530| 74 6f 20 4f 56 20 66 6f | 72 20 70 6c 61 63 69 6e |to OV fo|r placin|
|00001540| 67 20 73 63 6f 70 65 20 | 69 6e 20 4f 56 7d 0d 09 |g scope |in OV}..|
|00001550| 09 74 65 6d 70 50 74 20 | 3a 3d 20 73 63 72 6f 6c |.tempPt |:= scrol|
|00001560| 6c 50 6f 73 69 74 69 6f | 6e 3b 0d 09 09 4d 61 70 |lPositio|n;...Map|
|00001570| 50 74 28 20 74 65 6d 70 | 50 74 2c 20 76 69 65 77 |Pt( temp|Pt, view|
|00001580| 52 65 63 74 2c 20 4f 56 | 5e 2e 70 6f 72 74 52 65 |Rect, OV|^.portRe|
|00001590| 63 74 20 29 3b 0d 09 09 | 4f 66 66 53 65 74 52 65 |ct );...|OffSetRe|
|000015a0| 63 74 28 20 73 63 6f 70 | 65 2c 20 74 65 6d 70 50 |ct( scop|e, tempP|
|000015b0| 74 2e 68 2c 20 74 65 6d | 70 50 74 2e 76 20 29 3b |t.h, tem|pPt.v );|
|000015c0| 0d 0d 09 65 6e 64 3b 20 | 7b 4f 56 5f 50 72 65 70 |...end; |{OV_Prep|
|000015d0| 61 72 65 7d 0d 09 7b 2d | 2d 2d 2d 2d 2d 2d 2d 2d |are}..{-|--------|
|000015e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000015f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 7d 0d 09 50 72 6f 63 |--------|-}..Proc|
|00001600| 65 64 75 72 65 20 4f 56 | 5f 50 6f 73 69 74 69 6f |edure OV|_Positio|
|00001610| 6e 4f 76 65 72 56 69 65 | 77 3b 0d 09 76 61 72 20 |nOverVie|w;..var |
|00001620| 6f 66 66 73 65 74 20 3a | 20 50 6f 69 6e 74 3b 0d |offset :| Point;.|
|00001630| 09 62 65 67 69 6e 0d 09 | 09 53 65 74 50 6f 72 74 |.begin..|.SetPort|
|00001640| 28 20 6f 6c 64 50 6f 72 | 74 20 29 3b 0d 09 09 0d |( oldPor|t );....|
|00001650| 09 09 6f 66 66 73 65 74 | 20 3a 3d 20 77 68 65 72 |..offset| := wher|
|00001660| 65 3b 0d 09 09 47 6c 6f | 62 61 6c 54 6f 4c 6f 63 |e;...Glo|balToLoc|
|00001670| 61 6c 20 28 20 6f 66 66 | 73 65 74 20 29 3b 0d 09 |al ( off|set );..|
|00001680| 09 68 20 3a 3d 20 6f 66 | 66 73 65 74 2e 68 3b 09 |.h := of|fset.h;.|
|00001690| 09 7b 74 68 69 73 20 69 | 73 20 74 68 65 20 6c 6f |.{this i|s the lo|
|000016a0| 63 61 6c 20 76 61 6c 75 | 65 20 6f 66 20 74 68 65 |cal valu|e of the|
|000016b0| 20 70 6f 69 6e 74 20 6f | 66 20 6d 6f 75 73 65 64 | point o|f moused|
|000016c0| 6f 77 6e 7d 0d 09 09 76 | 20 3a 3d 20 6f 66 66 73 |own}...v| := offs|
|000016d0| 65 74 2e 76 3b 0d 09 09 | 0d 09 09 7b 6d 61 6b 65 |et.v;...|...{make|
|000016e0| 20 73 75 72 65 20 69 74 | 20 64 6f 65 73 6e 27 74 | sure it| doesn't|
|000016f0| 20 67 6f 20 6f 66 66 20 | 74 68 65 20 62 6f 74 74 | go off |the bott|
|00001700| 6f 6d 20 6f 66 20 74 68 | 65 20 77 69 6e 64 6f 77 |om of th|e window|
|00001710| 7d 0d 09 09 69 66 20 28 | 76 20 2b 20 4f 56 5e 2e |}...if (|v + OV^.|
|00001720| 70 6f 72 74 52 65 63 74 | 2e 62 6f 74 74 6f 6d 29 |portRect|.bottom)|
|00001730| 20 3e 3d 20 74 68 65 57 | 69 6e 64 6f 77 5e 2e 70 | >= theW|indow^.p|
|00001740| 6f 72 74 52 65 63 74 2e | 62 6f 74 74 6f 6d 0d 09 |ortRect.|bottom..|
|00001750| 09 09 74 68 65 6e 20 76 | 20 3a 3d 20 74 68 65 57 |..then v| := theW|
|00001760| 69 6e 64 6f 77 5e 2e 70 | 6f 72 74 52 65 63 74 2e |indow^.p|ortRect.|
|00001770| 62 6f 74 74 6f 6d 20 2d | 20 4f 56 5e 2e 70 6f 72 |bottom -| OV^.por|
|00001780| 74 52 65 63 74 2e 62 6f | 74 74 6f 6d 20 2d 20 31 |tRect.bo|ttom - 1|
|00001790| 3b 0d 09 09 7b 6d 61 6b | 65 20 73 75 72 65 20 69 |;...{mak|e sure i|
|000017a0| 74 20 64 6f 65 73 6e 27 | 74 20 67 6f 20 6f 66 66 |t doesn'|t go off|
|000017b0| 20 74 68 65 20 72 69 67 | 68 74 20 6f 66 20 74 68 | the rig|ht of th|
|000017c0| 65 20 77 69 6e 64 6f 77 | 7d 0d 09 09 69 66 20 28 |e window|}...if (|
|000017d0| 68 20 2b 20 4f 56 5e 2e | 70 6f 72 74 52 65 63 74 |h + OV^.|portRect|
|000017e0| 2e 72 69 67 68 74 29 20 | 3e 3d 20 74 68 65 57 69 |.right) |>= theWi|
|000017f0| 6e 64 6f 77 5e 2e 70 6f | 72 74 52 65 63 74 2e 72 |ndow^.po|rtRect.r|
|00001800| 69 67 68 74 0d 09 09 09 | 74 68 65 6e 20 68 20 3a |ight....|then h :|
|00001810| 3d 20 74 68 65 57 69 6e | 64 6f 77 5e 2e 70 6f 72 |= theWin|dow^.por|
|00001820| 74 52 65 63 74 2e 72 69 | 67 68 74 20 2d 20 4f 56 |tRect.ri|ght - OV|
|00001830| 5e 2e 70 6f 72 74 52 65 | 63 74 2e 72 69 67 68 74 |^.portRe|ct.right|
|00001840| 20 2d 20 31 3b 0d 09 09 | 7b 6d 61 6b 65 20 73 75 | - 1;...|{make su|
|00001850| 72 65 20 69 74 20 64 6f | 65 73 6e 27 74 20 67 6f |re it do|esn't go|
|00001860| 20 6f 66 66 20 74 68 65 | 20 74 6f 70 20 6f 66 20 | off the| top of |
|00001870| 74 68 65 20 77 69 6e 64 | 6f 77 7d 0d 09 09 69 66 |the wind|ow}...if|
|00001880| 20 76 20 3c 20 74 68 65 | 57 69 6e 64 6f 77 5e 2e | v < the|Window^.|
|00001890| 70 6f 72 74 52 65 63 74 | 2e 74 6f 70 20 74 68 65 |portRect|.top the|
|000018a0| 6e 20 76 20 3a 3d 20 74 | 68 65 57 69 6e 64 6f 77 |n v := t|heWindow|
|000018b0| 5e 2e 70 6f 72 74 52 65 | 63 74 2e 74 6f 70 3b 0d |^.portRe|ct.top;.|
|000018c0| 09 09 7b 6d 61 6b 65 20 | 73 75 72 65 20 69 74 20 |..{make |sure it |
|000018d0| 64 6f 65 73 6e 27 74 20 | 67 6f 20 6f 66 66 20 74 |doesn't |go off t|
|000018e0| 68 65 20 6c 65 66 74 20 | 6f 66 20 74 68 65 20 77 |he left |of the w|
|000018f0| 69 6e 64 6f 77 7d 0d 09 | 09 69 66 20 68 20 3c 20 |indow}..|.if h < |
|00001900| 74 68 65 57 69 6e 64 6f | 77 5e 2e 70 6f 72 74 52 |theWindo|w^.portR|
|00001910| 65 63 74 2e 6c 65 66 74 | 20 74 68 65 6e 20 68 20 |ect.left| then h |
|00001920| 3a 3d 20 74 68 65 57 69 | 6e 64 6f 77 5e 2e 70 6f |:= theWi|ndow^.po|
|00001930| 72 74 52 65 63 74 2e 6c | 65 66 74 3b 0d 09 09 0d |rtRect.l|eft;....|
|00001940| 09 09 53 65 74 50 74 20 | 28 20 6f 66 66 73 65 74 |..SetPt |( offset|
|00001950| 2c 20 68 2c 20 76 29 3b | 0d 09 09 4c 6f 63 61 6c |, h, v);|...Local|
|00001960| 54 6f 47 6c 6f 62 61 6c | 28 20 6f 66 66 73 65 74 |ToGlobal|( offset|
|00001970| 20 29 3b 0d 09 09 68 20 | 3a 3d 20 6f 66 66 73 65 | );...h |:= offse|
|00001980| 74 2e 68 3b 0d 09 09 76 | 20 3a 3d 20 6f 66 66 73 |t.h;...v| := offs|
|00001990| 65 74 2e 76 3b 0d 09 09 | 0d 09 09 53 65 74 50 6f |et.v;...|...SetPo|
|000019a0| 72 74 28 20 4f 56 20 29 | 3b 0d 09 09 4d 6f 76 65 |rt( OV )|;...Move|
|000019b0| 57 69 6e 64 6f 77 28 20 | 4f 56 2c 20 68 2c 20 76 |Window( |OV, h, v|
|000019c0| 2c 20 46 41 4c 53 45 20 | 29 3b 0d 09 65 6e 64 3b |, FALSE |);..end;|
|000019d0| 20 7b 4f 56 5f 50 6f 73 | 69 74 69 6f 6e 4f 76 65 | {OV_Pos|itionOve|
|000019e0| 72 56 69 65 77 7d 0d 09 | 7b 2d 2d 2d 2d 2d 2d 2d |rView}..|{-------|
|000019f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001a00| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 7d 0d 09 70 72 |--------|---}..pr|
|00001a10| 6f 63 65 64 75 72 65 20 | 4f 56 5f 53 61 76 65 42 |ocedure |OV_SaveB|
|00001a20| 69 74 73 3b 0d 09 76 61 | 72 0d 09 09 73 69 7a 65 |its;..va|r...size|
|00001a30| 4f 66 4f 66 66 09 3a 09 | 53 69 7a 65 3b 0d 09 09 |OfOff.:.|Size;...|
|00001a40| 6f 66 66 52 6f 77 42 79 | 74 65 73 09 3a 09 49 6e |offRowBy|tes.:.In|
|00001a50| 74 65 67 65 72 3b 0d 09 | 09 75 6e 64 65 72 52 65 |teger;..|.underRe|
|00001a60| 63 74 2c 0d 09 09 62 69 | 74 52 65 63 74 09 09 3a |ct,...bi|tRect..:|
|00001a70| 09 52 65 63 74 3b 0d 09 | 09 64 75 6d 6d 79 09 09 |.Rect;..|.dummy..|
|00001a80| 3a 09 50 6f 69 6e 74 3b | 0d 09 09 6f 66 66 50 6f |:.Point;|...offPo|
|00001a90| 72 74 2c 0d 09 09 6f 6c | 64 50 6f 72 74 09 09 3a |rt,...ol|dPort..:|
|00001aa0| 09 47 72 61 66 50 74 72 | 3b 0d 09 62 65 67 69 6e |.GrafPtr|;..begin|
|00001ab0| 0d 09 09 47 65 74 50 6f | 72 74 28 20 6f 6c 64 50 |...GetPo|rt( oldP|
|00001ac0| 6f 72 74 20 29 3b 0d 09 | 0d 09 09 7b 70 75 74 20 |ort );..|...{put |
|00001ad0| 74 68 65 20 77 69 6e 64 | 6f 77 20 6d 61 67 61 67 |the wind|ow magag|
|00001ae0| 65 72 20 70 6f 72 74 20 | 69 6e 74 6f 20 6f 66 66 |er port |into off|
|00001af0| 70 6f 72 74 20 61 73 20 | 61 20 77 69 6e 64 6f 77 |port as |a window|
|00001b00| 70 74 72 7d 0d 09 09 47 | 65 74 57 4d 67 72 50 6f |ptr}...G|etWMgrPo|
|00001b10| 72 74 28 20 6f 66 66 50 | 6f 72 74 20 29 3b 0d 09 |rt( offP|ort );..|
|00001b20| 09 77 68 69 63 68 57 69 | 6e 64 6f 77 20 3a 3d 20 |.whichWi|ndow := |
|00001b30| 57 69 6e 64 6f 77 50 74 | 72 28 20 6f 66 66 50 6f |WindowPt|r( offPo|
|00001b40| 72 74 20 29 3b 0d 0d 09 | 09 7b 61 6c 6c 6f 63 61 |rt );...|.{alloca|
|00001b50| 74 65 20 61 20 6e 65 77 | 20 67 72 61 66 70 6f 72 |te a new| grafpor|
|00001b60| 74 7d 0d 09 09 6f 66 66 | 50 6f 72 74 20 3a 3d 20 |t}...off|Port := |
|00001b70| 47 72 61 66 50 74 72 28 | 20 4e 65 77 50 74 72 28 |GrafPtr(| NewPtr(|
|00001b80| 20 73 69 7a 65 6f 66 28 | 20 47 72 61 66 50 6f 72 | sizeof(| GrafPor|
|00001b90| 74 20 29 29 29 3b 0d 09 | 09 0d 09 09 7b 68 6f 6d |t )));..|....{hom|
|00001ba0| 65 20 61 20 63 6f 70 79 | 20 6f 66 20 74 68 65 20 |e a copy| of the |
|00001bb0| 62 6f 75 6e 64 73 20 6f | 66 20 74 68 65 20 4f 56 |bounds o|f the OV|
|00001bc0| 20 77 69 6e 64 6f 77 7d | 0d 09 09 62 69 74 52 65 | window}|...bitRe|
|00001bd0| 63 74 20 3a 3d 20 4f 56 | 5e 2e 70 6f 72 74 42 69 |ct := OV|^.portBi|
|00001be0| 74 73 2e 62 6f 75 6e 64 | 73 3b 0d 09 09 6f 66 66 |ts.bound|s;...off|
|00001bf0| 73 65 74 52 65 63 74 28 | 20 62 69 74 52 65 63 74 |setRect(| bitRect|
|00001c00| 2c 20 2d 62 69 74 72 65 | 63 74 2e 6c 65 66 74 2c |, -bitre|ct.left,|
|00001c10| 20 2d 62 69 74 72 65 63 | 74 2e 74 6f 70 20 29 3b | -bitrec|t.top );|
|00001c20| 0d 0d 09 09 7b 63 6f 6d | 70 75 74 65 20 6d 65 6d |....{com|pute mem|
|00001c30| 6f 72 79 20 6e 65 63 65 | 73 73 61 72 79 20 66 6f |ory nece|ssary fo|
|00001c40| 72 20 6f 66 66 73 63 72 | 65 65 6e 20 62 69 74 6d |r offscr|een bitm|
|00001c50| 61 70 7d 0d 09 09 7b 61 | 6c 6c 6f 63 61 74 65 20 |ap}...{a|llocate |
|00001c60| 69 74 20 61 6e 64 20 73 | 65 74 75 70 20 62 69 74 |it and s|etup bit|
|00001c70| 6d 61 70 20 72 65 63 6f | 72 64 7d 0d 09 09 6f 66 |map reco|rd}...of|
|00001c80| 66 52 6f 77 42 79 74 65 | 73 20 3a 3d 20 28 20 62 |fRowByte|s := ( b|
|00001c90| 69 74 52 65 63 74 2e 72 | 69 67 68 74 20 64 69 76 |itRect.r|ight div|
|00001ca0| 20 38 20 29 20 2b 20 31 | 3b 0d 09 09 69 66 20 4f | 8 ) + 1|;...if O|
|00001cb0| 64 64 28 20 6f 66 66 52 | 6f 77 42 79 74 65 73 20 |dd( offR|owBytes |
|00001cc0| 29 20 74 68 65 6e 20 6f | 66 66 52 6f 77 42 79 74 |) then o|ffRowByt|
|00001cd0| 65 73 20 3a 3d 20 6f 66 | 66 52 6f 77 42 79 74 65 |es := of|fRowByte|
|00001ce0| 73 20 2d 31 3b 0d 09 09 | 73 69 7a 65 4f 66 4f 66 |s -1;...|sizeOfOf|
|00001cf0| 66 20 3a 3d 20 62 69 74 | 52 65 63 74 2e 62 6f 74 |f := bit|Rect.bot|
|00001d00| 74 6f 6d 20 2a 20 6f 66 | 66 52 6f 77 42 79 74 65 |tom * of|fRowByte|
|00001d10| 73 3b 0d 09 09 77 69 74 | 68 20 75 6e 64 65 72 53 |s;...wit|h underS|
|00001d20| 63 6f 70 65 20 64 6f 0d | 09 09 62 65 67 69 6e 0d |cope do.|..begin.|
|00001d30| 09 09 09 62 61 73 65 41 | 64 64 72 20 3a 3d 20 51 |...baseA|ddr := Q|
|00001d40| 44 50 74 72 28 20 4e 65 | 77 50 74 72 28 20 73 69 |DPtr( Ne|wPtr( si|
|00001d50| 7a 65 4f 66 4f 66 66 20 | 29 29 3b 0d 09 09 09 72 |zeOfOff |));....r|
|00001d60| 6f 77 62 79 74 65 73 20 | 3a 3d 20 6f 66 66 52 6f |owbytes |:= offRo|
|00001d70| 77 42 79 74 65 73 3b 0d | 09 09 09 62 6f 75 6e 64 |wBytes;.|...bound|
|00001d80| 73 20 20 20 3a 3d 20 62 | 69 74 52 65 63 74 3b 09 |s   := b|itRect;.|
|00001d90| 7b 75 73 69 6e 67 20 48 | 4f 4d 45 64 20 72 65 63 |{using H|OMEd rec|
|00001da0| 74 61 6e 67 6c 65 7d 0d | 09 09 65 6e 64 3b 0d 0d |tangle}.|..end;..|
|00001db0| 09 09 7b 6d 6f 76 65 20 | 61 20 63 6f 70 79 20 28 |..{move |a copy (|
|00001dc0| 74 6f 20 65 6e 73 75 72 | 65 20 6e 6f 20 73 63 61 |to ensur|e no sca|
|00001dd0| 6c 69 6e 67 20 6f 63 63 | 75 72 73 29 20 62 61 63 |ling occ|urs) bac|
|00001de0| 6b 20 77 68 65 72 65 20 | 4f 56 20 77 69 6c 6c 20 |k where |OV will |
|00001df0| 61 70 70 65 61 72 7d 0d | 09 09 75 6e 64 65 72 52 |appear}.|..underR|
|00001e00| 65 63 74 20 3a 3d 20 75 | 6e 64 65 72 53 63 6f 70 |ect := u|nderScop|
|00001e10| 65 2e 62 6f 75 6e 64 73 | 3b 0d 09 09 4f 66 66 73 |e.bounds|;...Offs|
|00001e20| 65 74 52 65 63 74 28 20 | 75 6e 64 65 72 52 65 63 |etRect( |underRec|
|00001e30| 74 2c 20 68 2d 31 2c 20 | 76 2d 31 20 29 3b 09 0d |t, h-1, |v-1 );..|
|00001e40| 0d 09 09 7b 61 63 74 75 | 61 6c 6c 79 20 73 61 76 |...{actu|ally sav|
|00001e50| 65 20 74 68 65 20 62 69 | 74 73 7d 0d 09 09 4f 70 |e the bi|ts}...Op|
|00001e60| 65 6e 50 6f 72 74 28 20 | 6f 66 66 50 6f 72 74 20 |enPort( |offPort |
|00001e70| 29 3b 0d 09 09 53 65 74 | 50 6f 72 74 42 69 74 73 |);...Set|PortBits|
|00001e80| 28 20 75 6e 64 65 72 53 | 63 6f 70 65 20 29 3b 0d |( underS|cope );.|
|00001e90| 09 09 53 65 74 43 6c 69 | 70 28 20 6f 66 66 50 6f |..SetCli|p( offPo|
|00001ea0| 72 74 5e 2e 76 69 73 52 | 67 6e 20 29 3b 0d 09 09 |rt^.visR|gn );...|
|00001eb0| 43 6f 70 79 42 69 74 73 | 28 20 77 68 69 63 68 57 |CopyBits|( whichW|
|00001ec0| 69 6e 64 6f 77 5e 2e 70 | 6f 72 74 42 69 74 73 2c |indow^.p|ortBits,|
|00001ed0| 20 75 6e 64 65 72 53 63 | 6f 70 65 2c 0d 09 09 09 | underSc|ope,....|
|00001ee0| 09 20 20 75 6e 64 65 72 | 52 65 63 74 2c 20 75 6e |.  under|Rect, un|
|00001ef0| 64 65 72 53 63 6f 70 65 | 2e 62 6f 75 6e 64 73 2c |derScope|.bounds,|
|00001f00| 0d 09 09 09 09 20 20 73 | 72 63 43 6f 70 79 2c 20 |.....  s|rcCopy, |
|00001f10| 4e 49 4c 29 3b 0d 09 09 | 53 65 74 50 6f 72 74 28 |NIL);...|SetPort(|
|00001f20| 20 6f 6c 64 50 6f 72 74 | 20 29 3b 0d 09 09 43 6c | oldPort| );...Cl|
|00001f30| 6f 73 65 50 6f 72 74 28 | 20 6f 66 66 50 6f 72 74 |osePort(| offPort|
|00001f40| 20 29 3b 0d 09 09 44 69 | 73 70 6f 73 50 74 72 28 | );...Di|sposPtr(|
|00001f50| 20 50 74 72 28 20 6f 66 | 66 50 6f 72 74 20 29 29 | Ptr( of|fPort ))|
|00001f60| 3b 09 0d 09 65 6e 64 3b | 20 7b 4f 56 5f 53 61 76 |;...end;| {OV_Sav|
|00001f70| 65 42 69 74 73 7d 0d 09 | 7b 2d 2d 2d 2d 2d 2d 2d |eBits}..|{-------|
|00001f80| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001f90| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 7d 0d 09 50 72 |--------|---}..Pr|
|00001fa0| 6f 63 65 64 75 72 65 20 | 4f 56 5f 53 68 6f 77 4f |ocedure |OV_ShowO|
|00001fb0| 76 65 72 56 69 65 77 3b | 0d 09 76 61 72 0d 09 09 |verView;|..var...|
|00001fc0| 62 6f 78 57 69 64 74 68 | 2c 20 0d 09 09 62 6f 78 |boxWidth|, ...box|
|00001fd0| 48 65 69 67 68 74 3a 20 | 69 6e 74 65 67 65 72 3b |Height: |integer;|
|00001fe0| 0d 09 62 65 67 69 6e 20 | 0d 09 09 4f 56 5f 53 61 |..begin |...OV_Sa|
|00001ff0| 76 65 42 69 74 73 3b 0d | 09 09 53 68 6f 77 48 69 |veBits;.|..ShowHi|
|00002000| 64 65 28 20 4f 56 2c 20 | 54 52 55 45 20 29 3b 09 |de( OV, |TRUE );.|
|00002010| 09 7b 6e 6f 77 20 74 68 | 65 20 77 69 6e 64 6f 77 |.{now th|e window|
|00002020| 20 61 70 70 65 61 72 73 | 7d 0d 09 09 0d 09 09 7b | appears|}......{|
|00002030| 62 6c 61 73 74 20 6d 69 | 6e 69 61 74 75 72 65 20 |blast mi|niature |
|00002040| 70 69 63 74 75 72 65 20 | 69 6e 74 6f 20 4f 56 7d |picture |into OV}|
|00002050| 0d 09 09 43 6f 70 79 42 | 69 74 73 28 4f 56 5f 70 |...CopyB|its(OV_p|
|00002060| 61 67 65 50 69 63 74 2c | 20 09 09 20 4f 56 5e 2e |agePict,| .. OV^.|
|00002070| 70 6f 72 74 42 69 74 73 | 2c 20 0d 09 09 09 09 20 |portBits|, ..... |
|00002080| 4f 56 5f 70 61 67 65 50 | 69 63 74 2e 62 6f 75 6e |OV_pageP|ict.boun|
|00002090| 64 73 2c 20 4f 56 5e 2e | 70 6f 72 74 52 65 63 74 |ds, OV^.|portRect|
|000020a0| 2c 0d 09 09 09 09 20 73 | 72 63 43 6f 70 79 2c 6e |,..... s|rcCopy,n|
|000020b0| 69 6c 29 3b 0d 09 09 0d | 09 09 7b 68 69 67 68 6c |il);....|..{highl|
|000020c0| 69 67 68 74 20 74 68 65 | 20 63 75 72 72 65 6e 74 |ight the| current|
|000020d0| 20 73 65 6c 65 63 74 69 | 6f 6e 7d 0d 09 09 49 6e | selecti|on}...In|
|000020e0| 76 65 72 74 52 65 63 74 | 28 20 73 63 6f 70 65 20 |vertRect|( scope |
|000020f0| 29 3b 0d 09 09 0d 09 09 | 7b 67 69 76 65 20 74 68 |);......|{give th|
|00002100| 65 20 75 73 65 72 20 73 | 6f 6d 65 20 72 6f 6f 6d |e user s|ome room|
|00002110| 20 74 6f 20 62 65 20 73 | 6c 6f 70 70 79 7d 0d 09 | to be s|loppy}..|
|00002120| 09 73 6c 6f 70 52 65 63 | 74 20 3a 3d 20 4f 56 5e |.slopRec|t := OV^|
|00002130| 2e 70 6f 72 74 52 65 63 | 74 3b 0d 09 09 49 6e 73 |.portRec|t;...Ins|
|00002140| 65 74 52 65 63 74 28 20 | 73 6c 6f 70 52 65 63 74 |etRect( |slopRect|
|00002150| 2c 20 2d 32 35 2c 20 2d | 32 35 20 29 3b 0d 0d 09 |, -25, -|25 );...|
|00002160| 09 47 6c 6f 62 61 6c 54 | 6f 4c 6f 63 61 6c 28 20 |.GlobalT|oLocal( |
|00002170| 77 68 65 72 65 20 29 3b | 0d 0d 09 09 7b 63 6f 6d |where );|....{com|
|00002180| 70 75 74 65 20 73 69 7a | 65 20 6f 66 20 74 68 65 |pute siz|e of the|
|00002190| 20 64 72 61 67 67 61 62 | 6c 65 20 72 65 67 69 6f | draggab|le regio|
|000021a0| 6e 20 61 6e 64 20 63 65 | 6e 74 65 72 20 69 74 20 |n and ce|nter it |
|000021b0| 6f 6e 20 74 68 65 20 63 | 75 72 73 6f 72 7d 0d 09 |on the c|ursor}..|
|000021c0| 09 62 6f 78 57 69 64 74 | 68 20 3a 3d 20 73 63 6f |.boxWidt|h := sco|
|000021d0| 70 65 2e 72 69 67 68 74 | 20 2d 20 73 63 6f 70 65 |pe.right| - scope|
|000021e0| 2e 6c 65 66 74 3b 0d 09 | 09 62 6f 78 48 65 69 67 |.left;..|.boxHeig|
|000021f0| 68 74 20 3a 3d 20 73 63 | 6f 70 65 2e 62 6f 74 74 |ht := sc|ope.bott|
|00002200| 6f 6d 20 2d 20 73 63 6f | 70 65 2e 74 6f 70 3b 0d |om - sco|pe.top;.|
|00002210| 09 09 4f 66 66 73 65 74 | 52 67 6e 28 20 64 72 61 |..Offset|Rgn( dra|
|00002220| 67 52 65 63 74 52 67 6e | 2c 20 77 68 65 72 65 2e |gRectRgn|, where.|
|00002230| 68 2d 28 62 6f 78 57 69 | 64 74 68 20 64 69 76 20 |h-(boxWi|dth div |
|00002240| 32 29 2c 20 0d 09 09 09 | 09 09 09 09 09 77 68 65 |2), ....|.....whe|
|00002250| 72 65 2e 76 2d 28 62 6f | 78 48 65 69 67 68 74 20 |re.v-(bo|xHeight |
|00002260| 64 69 76 20 32 29 20 29 | 3b 0d 09 09 4f 66 66 53 |div 2) )|;...OffS|
|00002270| 65 74 52 65 63 74 28 20 | 6c 69 6d 69 74 52 65 63 |etRect( |limitRec|
|00002280| 74 2c 20 62 6f 78 57 69 | 64 74 68 20 64 69 76 20 |t, boxWi|dth div |
|00002290| 32 2c 20 62 6f 78 48 65 | 69 67 68 74 20 64 69 76 |2, boxHe|ight div|
|000022a0| 20 32 29 3b 20 0d 0d 09 | 09 7b 6c 65 74 20 74 68 | 2); ...|.{let th|
|000022b0| 65 20 75 73 65 72 20 64 | 72 61 67 20 69 74 20 61 |e user d|rag it a|
|000022c0| 72 6f 75 6e 64 7d 0d 09 | 09 76 61 6c 75 65 20 3a |round}..|.value :|
|000022d0| 3d 20 44 72 61 67 47 72 | 61 79 52 67 6e 28 20 64 |= DragGr|ayRgn( d|
|000022e0| 72 61 67 52 65 63 74 52 | 67 6e 2c 77 68 65 72 65 |ragRectR|gn,where|
|000022f0| 2c 6c 69 6d 69 74 52 65 | 63 74 2c 73 6c 6f 70 52 |,limitRe|ct,slopR|
|00002300| 65 63 74 2c 30 2c 6e 69 | 6c 20 29 3b 0d 09 09 0d |ect,0,ni|l );....|
|00002310| 09 65 6e 64 3b 20 7b 4f | 56 5f 53 68 6f 77 4f 76 |.end; {O|V_ShowOv|
|00002320| 65 72 56 69 65 77 7d 0d | 09 7b 2d 2d 2d 2d 2d 2d |erView}.|.{------|
|00002330| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002340| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 7d 0d 09 50 |--------|----}..P|
|00002350| 72 6f 63 65 64 75 72 65 | 20 4f 56 5f 52 65 73 74 |rocedure| OV_Rest|
|00002360| 6f 72 65 42 69 74 73 3b | 0d 09 76 61 72 20 75 6e |oreBits;|..var un|
|00002370| 64 65 72 52 65 63 74 3a | 20 52 65 63 74 3b 0d 09 |derRect:| Rect;..|
|00002380| 62 65 67 69 6e 0d 09 20 | 09 75 6e 64 65 72 52 65 |begin.. |.underRe|
|00002390| 63 74 20 3a 3d 20 75 6e | 64 65 72 53 63 6f 70 65 |ct := un|derScope|
|000023a0| 2e 62 6f 75 6e 64 73 3b | 0d 0d 09 09 7b 68 6f 6d |.bounds;|....{hom|
|000023b0| 65 20 74 68 65 20 72 65 | 63 74 61 6e 67 6c 65 7d |e the re|ctangle}|
|000023c0| 0d 09 20 09 4f 66 66 73 | 65 74 52 65 63 74 28 20 |.. .Offs|etRect( |
|000023d0| 75 6e 64 65 72 52 65 63 | 74 2c 20 2d 75 6e 64 65 |underRec|t, -unde|
|000023e0| 72 52 65 63 74 2e 6c 65 | 66 74 2c 20 2d 75 6e 64 |rRect.le|ft, -und|
|000023f0| 65 72 52 65 63 74 2e 74 | 6f 70 29 3b 0d 09 09 0d |erRect.t|op);....|
|00002400| 09 09 7b 70 6f 73 69 74 | 69 6f 6e 20 69 74 20 63 |..{posit|ion it c|
|00002410| 6f 72 72 65 63 74 6c 79 | 7d 0d 09 20 09 4f 66 66 |orrectly|}.. .Off|
|00002420| 53 65 74 52 65 63 74 28 | 20 75 6e 64 65 72 52 65 |SetRect(| underRe|
|00002430| 63 74 2c 20 68 2d 31 2c | 20 76 2d 31 29 3b 0d 09 |ct, h-1,| v-1);..|
|00002440| 09 0d 09 09 7b 62 6c 61 | 73 74 20 73 74 75 66 66 |....{bla|st stuff|
|00002450| 20 75 6e 64 65 72 20 77 | 69 6e 64 6f 77 20 62 61 | under w|indow ba|
|00002460| 63 6b 20 69 6e 74 6f 20 | 70 6f 73 69 74 69 6f 6e |ck into |position|
|00002470| 7d 0d 09 09 43 6f 70 79 | 42 69 74 73 28 20 75 6e |}...Copy|Bits( un|
|00002480| 64 65 72 53 63 6f 70 65 | 2c 20 77 68 69 63 68 57 |derScope|, whichW|
|00002490| 69 6e 64 6f 77 5e 2e 70 | 6f 72 74 42 69 74 73 2c |indow^.p|ortBits,|
|000024a0| 20 0d 09 09 09 09 20 20 | 75 6e 64 65 72 53 63 6f | .....  |underSco|
|000024b0| 70 65 2e 62 6f 75 6e 64 | 73 2c 20 75 6e 64 65 72 |pe.bound|s, under|
|000024c0| 52 65 63 74 2c 0d 09 09 | 09 09 20 20 73 72 63 43 |Rect,...|..  srcC|
|000024d0| 6f 70 79 2c 20 4e 49 4c | 29 3b 0d 09 09 0d 09 09 |opy, NIL|);......|
|000024e0| 7b 64 65 61 6c 6c 6f 63 | 61 74 65 20 74 68 65 20 |{dealloc|ate the |
|000024f0| 62 69 74 6d 61 70 20 73 | 70 61 63 65 20 28 62 65 |bitmap s|pace (be|
|00002500| 20 6e 69 63 65 20 61 6e | 64 20 63 6c 65 61 6e 29 | nice an|d clean)|
|00002510| 7d 0d 09 09 44 69 73 70 | 6f 73 50 74 72 28 20 50 |}...Disp|osPtr( P|
|00002520| 74 72 28 20 75 6e 64 65 | 72 53 63 6f 70 65 2e 62 |tr( unde|rScope.b|
|00002530| 61 73 65 41 64 64 72 20 | 29 29 3b 0d 09 65 6e 64 |aseAddr |));..end|
|00002540| 3b 20 7b 4f 56 5f 52 65 | 73 74 6f 72 65 42 69 74 |; {OV_Re|storeBit|
|00002550| 73 7d 0d 09 7b 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |s}..{---|--------|
|00002560| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002570| 2d 2d 2d 2d 2d 2d 2d 7d | 0d 09 50 72 6f 63 65 64 |-------}|..Proced|
|00002580| 75 72 65 20 4f 56 5f 48 | 61 6e 64 6c 65 53 65 6c |ure OV_H|andleSel|
|00002590| 65 63 74 69 6f 6e 3b 0d | 09 09 7b 2d 2d 2d 2d 2d |ection;.|..{-----|
|000025a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000025b0| 2d 2d 2d 7d 0d 09 09 50 | 72 6f 63 65 64 75 72 65 |---}...P|rocedure|
|000025c0| 20 4f 56 5f 46 6c 61 73 | 68 53 65 6c 65 63 74 69 | OV_Flas|hSelecti|
|000025d0| 6f 6e 3b 0d 09 09 76 61 | 72 20 69 3a 20 49 6e 74 |on;...va|r i: Int|
|000025e0| 65 67 65 72 3b 0d 09 09 | 09 6a 3a 20 4c 6f 6e 67 |eger;...|.j: Long|
|000025f0| 49 6e 74 3b 0d 09 09 62 | 65 67 69 6e 0d 09 09 09 |Int;...b|egin....|
|00002600| 48 4c 6f 63 6b 28 20 48 | 61 6e 64 6c 65 28 20 64 |HLock( H|andle( d|
|00002610| 72 61 67 52 65 63 74 52 | 67 6e 20 29 29 3b 09 09 |ragRectR|gn ));..|
|00002620| 7b 74 72 79 20 74 6f 20 | 6d 61 6b 65 20 74 68 69 |{try to |make thi|
|00002630| 73 20 61 20 68 61 62 69 | 74 21 7d 0d 09 09 09 66 |s a habi|t!}....f|
|00002640| 6f 72 20 69 20 3a 3d 20 | 31 20 74 6f 20 32 2a 4d |or i := |1 to 2*M|
|00002650| 65 6e 75 46 6c 61 73 68 | 5e 20 64 6f 20 62 65 67 |enuFlash|^ do beg|
|00002660| 69 6e 0d 09 09 09 09 49 | 6e 76 65 72 74 52 65 63 |in.....I|nvertRec|
|00002670| 74 28 20 64 72 61 67 52 | 65 63 74 52 67 6e 5e 5e |t( dragR|ectRgn^^|
|00002680| 2e 72 67 6e 42 42 6f 78 | 20 29 3b 0d 09 09 09 09 |.rgnBBox| );.....|
|00002690| 64 65 6c 61 79 28 20 34 | 2c 6a 20 29 3b 0d 09 09 |delay( 4|,j );...|
|000026a0| 09 65 6e 64 3b 0d 09 09 | 09 48 55 6e 4c 6f 63 6b |.end;...|.HUnLock|
|000026b0| 28 20 48 61 6e 64 6c 65 | 28 20 64 72 61 67 52 65 |( Handle|( dragRe|
|000026c0| 63 74 52 67 6e 20 29 29 | 3b 09 7b 62 75 74 20 64 |ctRgn ))|;.{but d|
|000026d0| 6f 6e 27 74 20 66 6f 72 | 67 65 74 20 74 68 69 73 |on't for|get this|
|000026e0| 20 70 61 72 74 7d 0d 09 | 09 65 6e 64 3b 0d 09 09 | part}..|.end;...|
|000026f0| 7b 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |{-------|--------|
|00002700| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 7d 0d 09 62 65 67 69 |--------|-}..begi|
|00002710| 6e 20 7b 4f 56 5f 48 61 | 6e 64 6c 65 53 65 6c 65 |n {OV_Ha|ndleSele|
|00002720| 63 74 69 6f 6e 7d 0d 09 | 09 69 66 20 28 48 69 57 |ction}..|.if (HiW|
|00002730| 6f 72 64 28 76 61 6c 75 | 65 29 3c 3e 2d 33 32 37 |ord(valu|e)<>-327|
|00002740| 36 38 29 20 6f 72 20 28 | 4c 6f 57 6f 72 64 28 76 |68) or (|LoWord(v|
|00002750| 61 6c 75 65 29 3c 3e 2d | 33 32 37 36 38 29 0d 09 |alue)<>-|32768)..|
|00002760| 09 74 68 65 6e 20 09 09 | 09 09 09 09 7b 75 73 65 |.then ..|....{use|
|00002770| 72 20 61 63 74 75 61 6c | 6c 79 20 6d 61 64 65 20 |r actual|ly made |
|00002780| 61 20 73 65 6c 65 63 74 | 69 6f 6e 7d 0d 09 09 09 |a select|ion}....|
|00002790| 62 65 67 69 6e 0d 09 09 | 09 09 49 6e 76 65 72 74 |begin...|..Invert|
|000027a0| 52 65 63 74 28 20 73 63 | 6f 70 65 20 29 3b 09 7b |Rect( sc|ope );.{|
|000027b0| 74 75 72 6e 20 6f 66 66 | 20 63 75 72 72 65 6e 74 |turn off| current|
|000027c0| 20 73 65 6c 65 63 74 69 | 6f 6e 7d 0d 09 09 09 09 | selecti|on}.....|
|000027d0| 4f 56 5f 46 6c 61 73 68 | 53 65 6c 65 63 74 69 6f |OV_Flash|Selectio|
|000027e0| 6e 3b 0d 09 09 09 09 53 | 68 6f 77 48 69 64 65 28 |n;.....S|howHide(|
|000027f0| 20 4f 56 2c 20 46 41 4c | 53 45 20 29 3b 09 7b 68 | OV, FAL|SE );.{h|
|00002800| 69 64 65 20 74 68 65 20 | 4f 56 20 77 69 6e 64 6f |ide the |OV windo|
|00002810| 77 7d 0d 09 09 09 09 53 | 65 74 50 6f 72 74 28 20 |w}.....S|etPort( |
|00002820| 6f 6c 64 50 6f 72 74 20 | 29 3b 0d 09 09 09 09 4f |oldPort |);.....O|
|00002830| 56 5f 52 65 73 74 6f 72 | 65 42 69 74 73 3b 09 09 |V_Restor|eBits;..|
|00002840| 09 7b 62 6c 61 73 74 20 | 62 69 74 73 20 62 61 63 |.{blast |bits bac|
|00002850| 6b 20 69 6e 74 6f 20 70 | 6c 61 63 65 7d 0d 0d 09 |k into p|lace}...|
|00002860| 09 09 09 7b 66 69 67 75 | 72 65 20 74 68 65 20 6e |...{figu|re the n|
|00002870| 65 77 20 73 63 72 6f 6c | 6c 50 6f 73 69 74 69 6f |ew scrol|lPositio|
|00002880| 6e 20 62 61 73 65 64 20 | 6f 6e 20 74 68 65 20 74 |n based |on the t|
|00002890| 6f 70 2d 6c 65 66 74 20 | 63 6f 72 6e 65 72 7d 0d |op-left |corner}.|
|000028a0| 09 09 09 09 7b 6f 66 20 | 74 68 65 20 64 72 61 67 |....{of |the drag|
|000028b0| 67 61 62 6c 65 20 72 65 | 67 69 6f 6e 7d 0d 09 09 |gable re|gion}...|
|000028c0| 09 09 53 65 74 50 74 28 | 20 74 65 6d 70 50 74 2c |..SetPt(| tempPt,|
|000028d0| 20 64 72 61 67 52 65 63 | 74 52 67 6e 5e 5e 2e 72 | dragRec|tRgn^^.r|
|000028e0| 67 6e 42 42 6f 78 2e 6c | 65 66 74 2c 20 64 72 61 |gnBBox.l|eft, dra|
|000028f0| 67 52 65 63 74 52 67 6e | 5e 5e 2e 72 67 6e 42 42 |gRectRgn|^^.rgnBB|
|00002900| 6f 78 2e 74 6f 70 20 29 | 3b 0d 09 09 09 09 4d 61 |ox.top )|;.....Ma|
|00002910| 70 50 74 28 20 74 65 6d | 70 50 74 2c 20 4f 56 5e |pPt( tem|pPt, OV^|
|00002920| 2e 70 6f 72 74 52 65 63 | 74 2c 20 76 69 65 77 52 |.portRec|t, viewR|
|00002930| 65 63 74 20 29 3b 0d 09 | 09 09 09 73 63 72 6f 6c |ect );..|...scrol|
|00002940| 6c 50 6f 73 69 74 69 6f | 6e 20 3a 3d 20 74 65 6d |lPositio|n := tem|
|00002950| 70 50 74 3b 0d 09 09 09 | 09 0d 09 09 09 09 74 65 |pPt;....|......te|
|00002960| 6d 70 52 65 63 74 20 3a | 3d 20 76 69 65 77 52 65 |mpRect :|= viewRe|
|00002970| 63 74 3b 0d 09 09 09 09 | 74 65 6d 70 52 65 63 74 |ct;.....|tempRect|
|00002980| 2e 62 6f 74 74 6f 6d 20 | 3a 3d 20 74 65 6d 70 52 |.bottom |:= tempR|
|00002990| 65 63 74 2e 62 6f 74 74 | 6f 6d 20 2d 20 70 61 6e |ect.bott|om - pan|
|000029a0| 65 2e 76 3b 0d 09 09 09 | 09 74 65 6d 70 52 65 63 |e.v;....|.tempRec|
|000029b0| 74 2e 72 69 67 68 74 20 | 3a 3d 20 74 65 6d 70 52 |t.right |:= tempR|
|000029c0| 65 63 74 2e 72 69 67 68 | 74 20 2d 20 70 61 6e 65 |ect.righ|t - pane|
|000029d0| 2e 68 3b 0d 09 09 09 09 | 4d 61 70 50 74 20 28 20 |.h;.....|MapPt ( |
|000029e0| 74 65 6d 70 50 74 2c 20 | 74 65 6d 70 52 65 63 74 |tempPt, |tempRect|
|000029f0| 2c 20 76 69 65 77 52 65 | 63 74 20 29 3b 0d 09 09 |, viewRe|ct );...|
|00002a00| 09 09 0d 09 09 09 09 7b | 73 65 74 20 74 68 65 20 |.......{|set the |
|00002a10| 6e 65 77 20 73 63 72 6f | 6c 6c 20 62 61 72 20 76 |new scro|ll bar v|
|00002a20| 61 6c 75 65 73 7d 0d 09 | 09 09 09 53 65 74 43 74 |alues}..|...SetCt|
|00002a30| 6c 56 61 6c 75 65 28 20 | 48 53 63 72 6f 6c 6c 42 |lValue( |HScrollB|
|00002a40| 61 72 2c 20 74 65 6d 70 | 50 74 2e 68 20 29 3b 0d |ar, temp|Pt.h );.|
|00002a50| 09 09 09 09 53 65 74 43 | 74 6c 56 61 6c 75 65 28 |....SetC|tlValue(|
|00002a60| 20 56 53 63 72 6f 6c 6c | 42 61 72 2c 20 74 65 6d | VScroll|Bar, tem|
|00002a70| 70 50 74 2e 76 20 29 3b | 0d 09 09 09 09 49 6e 76 |pPt.v );|.....Inv|
|00002a80| 61 6c 52 65 63 74 28 20 | 74 68 65 57 69 6e 64 6f |alRect( |theWindo|
|00002a90| 77 5e 2e 70 6f 72 74 52 | 65 63 74 20 29 3b 0d 09 |w^.portR|ect );..|
|00002aa0| 09 09 65 6e 64 0d 09 09 | 65 6c 73 65 20 09 09 7b |..end...|else ..{|
|00002ab0| 6e 6f 20 73 65 6c 65 63 | 74 69 6f 6e 20 77 61 73 |no selec|tion was|
|00002ac0| 20 6d 61 64 65 7d 0d 09 | 09 09 62 65 67 69 6e 0d | made}..|..begin.|
|00002ad0| 09 09 09 09 53 68 6f 77 | 48 69 64 65 28 20 4f 56 |....Show|Hide( OV|
|00002ae0| 2c 20 46 41 4c 53 45 20 | 29 3b 09 09 7b 68 69 64 |, FALSE |);..{hid|
|00002af0| 65 20 74 68 65 20 77 69 | 6e 64 6f 77 7d 0d 09 09 |e the wi|ndow}...|
|00002b00| 09 09 53 65 74 50 6f 72 | 74 28 20 6f 6c 64 50 6f |..SetPor|t( oldPo|
|00002b10| 72 74 20 29 3b 0d 09 09 | 09 09 4f 56 5f 52 65 73 |rt );...|..OV_Res|
|00002b20| 74 6f 72 65 42 69 74 73 | 3b 09 09 09 09 7b 72 65 |toreBits|;....{re|
|00002b30| 70 6c 61 63 65 20 74 68 | 65 20 75 6e 64 65 72 6e |place th|e undern|
|00002b40| 65 61 74 68 20 62 69 74 | 73 7d 0d 09 09 09 09 42 |eath bit|s}.....B|
|00002b50| 65 67 69 6e 55 70 64 61 | 74 65 28 20 74 68 65 57 |eginUpda|te( theW|
|00002b60| 69 6e 64 6f 77 20 29 3b | 09 7b 73 74 65 61 6c 20 |indow );|.{steal |
|00002b70| 74 68 65 20 75 70 64 61 | 74 65 20 65 76 65 6e 74 |the upda|te event|
|00002b80| 73 7d 0d 09 09 09 09 45 | 6e 64 55 70 64 61 74 65 |s}.....E|ndUpdate|
|00002b90| 20 20 28 20 74 68 65 57 | 69 6e 64 6f 77 20 29 3b |  ( theW|indow );|
|00002ba0| 0d 09 09 09 65 6e 64 3b | 0d 09 65 6e 64 3b 20 7b |....end;|..end; {|
|00002bb0| 4f 56 5f 48 61 6e 64 6c | 65 53 65 6c 65 63 74 69 |OV_Handl|eSelecti|
|00002bc0| 6f 6e 7d 0d 09 7b 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |on}..{--|--------|
|00002bd0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002be0| 2d 2d 2d 2d 2d 2d 2d 2d | 7d 0d 09 50 72 6f 63 65 |--------|}..Proce|
|00002bf0| 64 75 72 65 20 4f 56 5f | 54 69 64 79 55 70 3b 0d |dure OV_|TidyUp;.|
|00002c00| 09 62 65 67 69 6e 0d 09 | 09 44 69 73 70 6f 73 65 |.begin..|.Dispose|
|00002c10| 52 67 6e 28 20 64 72 61 | 67 52 65 63 74 52 67 6e |Rgn( dra|gRectRgn|
|00002c20| 20 29 3b 0d 09 65 6e 64 | 3b 20 7b 4f 56 5f 54 69 | );..end|; {OV_Ti|
|00002c30| 64 79 55 70 7d 0d 09 7b | 2d 2d 2d 2d 2d 2d 2d 2d |dyUp}..{|--------|
|00002c40| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002c50| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 7d 0d 62 65 67 69 |--------|--}.begi|
|00002c60| 6e 0d 09 4f 56 5f 50 72 | 65 70 61 72 65 3b 0d 09 |n..OV_Pr|epare;..|
|00002c70| 4f 56 5f 50 6f 73 69 74 | 69 6f 6e 4f 76 65 72 56 |OV_Posit|ionOverV|
|00002c80| 69 65 77 3b 0d 09 4f 56 | 5f 53 68 6f 77 4f 76 65 |iew;..OV|_ShowOve|
|00002c90| 72 56 69 65 77 3b 0d 09 | 4f 56 5f 48 61 6e 64 6c |rView;..|OV_Handl|
|00002ca0| 65 53 65 6c 65 63 74 69 | 6f 6e 3b 0d 09 4f 56 5f |eSelecti|on;..OV_|
|00002cb0| 54 69 64 79 55 70 3b 0d | 65 6e 64 3b 20 7b 4f 76 |TidyUp;.|end; {Ov|
|00002cc0| 65 72 56 69 65 77 53 65 | 6c 65 63 74 7d 0d 0d 45 |erViewSe|lect}..E|
|00002cd0| 4e 44 2e 20 7b 55 4e 49 | 54 20 4f 76 65 72 56 69 |ND. {UNI|T OverVi|
|00002ce0| 65 77 7d 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |ew}.....|........|
|00002cf0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002d00| 00 00 01 00 00 00 01 4c | 00 00 00 4c 00 00 00 32 |.......L|...L...2|
|00002d10| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00002d20| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00002d30| 0a 4f 76 65 72 56 69 65 | 77 2e 70 56 02 00 00 00 |.OverVie|w.pV....|
|00002d40| 54 45 58 54 4d 50 53 20 | 01 00 00 00 00 00 00 00 |TEXTMPS |........|
|00002d50| 00 00 54 45 58 54 4d 50 | 53 20 01 00 00 00 00 00 |..TEXTMP|S ......|
|00002d60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002d70| 00 00 9b 3c 82 65 00 00 | 2c 63 00 00 01 7e ff ff |...<.e..|,c...~..|
|00002d80| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00002d90| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00002da0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00002db0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00002dc0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00002dd0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00002de0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00002df0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00002e00| 00 00 00 48 00 09 4d 6f | 6e 61 63 6f 00 17 98 12 |...H..Mo|naco....|
|00002e10| 00 02 30 e8 00 00 02 00 | 00 00 22 00 02 00 00 00 |..0.....|..".....|
|00002e20| 00 00 00 00 00 00 00 06 | 00 04 00 27 00 04 01 41 |........|...'...A|
|00002e30| 02 00 00 27 00 04 01 41 | 02 00 9b 3e 6c 36 00 00 |...'...A|...>l6..|
|00002e40| 2b 02 00 00 2b 02 00 00 | 2a 96 01 00 00 00 01 00 |+...+...|*.......|
|00002e50| 00 00 01 4c 00 00 00 4c | 00 00 00 32 00 01 21 ba |...L...L|...2..!.|
|00002e60| 02 94 00 00 00 1c 00 32 | 00 00 4d 50 53 52 00 00 |.......2|..MPSR..|
|00002e70| 00 0a 03 ed ff ff 00 00 | 00 00 00 02 00 1a 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+